﻿Public Class ReportUT510
	Inherits System.Web.UI.Page

	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
		If Not Page.IsPostBack Then
			BL.Report.SetMonthList(Me.ddlMonth)
			BL.Report.SetYearList(Me.ddlYear)
		End If
	End Sub

	Protected Sub btnPDF_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnPDF.Click
		Me.ClientScript.RegisterClientScriptBlock(Me.GetType, "ut510", "window.open('report/exportpdf.aspx?rptname=ut510', 'exportpdf','')", True)
		Me.Session("reportdatasource") = BL.Report.ReportUT510(Me.ddlMonth.SelectedValue, Me.ddlYear.SelectedValue, Me.incomeFrom.Text, Me.incomeTo.Text)
	End Sub
End Class